local reserved = {
	["while"] = true, ["if"] = true,
	["else"] = true, 	["do"] = true,
}

function isReserved (s)
	for w in string.gmatch(s, "[%a_][%w_]*") do
		if not reserved[w] then 
			print(s .. " not a reserved word")
		end
	end
end

function Set (list)
	local set = {}
	for _, l in ipairs(list) do set[l] = true end
	return set
end

local new_reserved = Set({"while", "end", "function", "local"})
